home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 46 / Amiga Format CD46 (1999-10-20)(Future Publishing)(GB)[!][issue 1999-12].iso / -serious- / programming / other / tandem / teaching / 19.asm < prev    next >
Assembly Source File  |  1999-09-06  |  352b  |  27 lines
  1. * 19.asm    NARG, conditional assembly     version 0.00   1.9.97
  2.  
  3. * sum of 0 to 4 things to register \1
  4. sum: macro
  5.  moveq #0,\1
  6.  IFGE NARG-2
  7.  add.l #\2,\1
  8.  IFGE NARG-3
  9.  add.l #\3,\1
  10.  IFGE NARG-4
  11.  add.l #\4,\1
  12.  IFGE NARG-5
  13.  add.l #\5,\1
  14.  ENDC
  15.  ENDC
  16.  ENDC
  17.  ENDC
  18.  ENDM
  19.  
  20. * do some sums
  21.  sum d0,4,5
  22.  sum d1
  23.  sum d2,5,6,7
  24.  sum d3,-1,2,0
  25.  sum d4,1,2,3,4
  26.  rts
  27.